ccccccccccce Lk DDDDDDDODDOD 

ccccecccccce LLL DDDDDDDODDDD 

cccceccccccce lL DDDDDDDDDDDD 
ccc LLL DOD DOD 
ccc LLL DOD dD 
ccc LLL DDD DOD 
ccc LLL DDD DOD 
ccc LLL DOD DD 
ccc LLL DDD DOD 
ccc LLL DOD DOD 
ccc LLL DOD DOD 
ccc LLL DOD DOD 
ccc LLL DDD DOD 
ccc LLL DDD DOD 
ccc LLL DDD DOD 
ccc LLL DDD DOD 
ccc LLL DOD DOD 
ccc D 


LLL dD DDD 
CCCCCC LLLLLLELLLLLLLL DDDDDDDDDDDD 
CCCCCC  LLLLLLLLLLLLLLL DDDDDDDDDDDD 
CCCCCC LLLLLLLLLLLLLLL DDDDDDDDDDDD 


CO 
COO” 
COn 
COOn 
COO 
OOn 


**FILE**1D**DCLTABLE2 
DDDDDDDD ccccccce (Lk ITTTTTITTT AAAAAA BBBBBEBB LL ECEEEEEEEE 335555 
DODDDDDD ceccccce = TITTTTTTIT AABARA BBBBESBB LL EEEEEEEEEE 222222 
DD DD CC LL TT AA AA BB BB LL EE $8 22 
DD DD CC LL TT AA AA 8B BB LL EE é $§ 
DD DD CC LL TT AA AA BB BB LL EE 2 
DD DD CC LL TT An AA BB LL EE 22 
DD DD CC LL TT Aa AA 88888888 LL EEEEEEEE 22 
DD DD CC LL TT AA AA 88888888 LL EEEESEEE 22 
DD DD CC LL TT AAAAAAAAAA BB BB LL EE 22 
DD dD CC LL TT AAAAAAAAAA BB BB LL EE 22 
DD DD CC LL TT AA AA BB BB LL EE 22 eeee 
DD DD cc LL TT AA AA 8B BB LL EE 22 esos 
DDDDDDDD cccccccc LLLLLLLLLL TT 4A AA ®BBBB8BBB LLLLLLLLLL EEEEEEEEEE 2222222222 eeee 
DDDDDDDD CCCCCCCC LLLLLLLLLL TT 4A AA BBBBBBBB LLLLLLLLLL EEEEEEEEEE 2222222222 eee 
LL III] SSSSSSSS 
LL III! SSSSSSSS 
LL II SS 
LL I] SS 
LL II SS 
LL I] SS 
LL I] SSSSSS 
LL I] SSSSSS 
LL I] SS 
LL II SS 
LL I] SS 
LL I] SS 
LLLLLLLLLL IIII11 SSSSSSSS 
LLLLLLLLLL HII SSSSSSSS 
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Version: *v04-000' 


define type check_options 
verwore all” : 


keyword none 
keyword bounds, negatable 
keyword overflow, negatable 
keyword underflow, negatable 
define type debug_options 
keyword alt 
keyword none 
keyword symbols, negatable 
keyword traceback, negatable 


define type show_options 
yword alT 


keyword none 
keyword preprocessor, negatable 


keyword include, negatable 

keyword MAP, negatable 
define type standard_options 

eyword all 

keyword none 

keyword syntax, negatable 


keyword source_form, negatable 


define syntax fortran_using_f77 
image backtrans 


define syntax dml 
mage fordml 


define verb fortran 
image fortran 
prefix cliS$k_fort_ 
parameter pl,prompt="‘File’',value(required,iist,type=Sinfile),label=infile 
qualifier check, value(Llist type=check_opt ions 
qualifier continuations ,nonnegatable,default,va ue (de fault=19) 
qualifier cross_reference 
qualifier debug, value(List,type=debug_options) 
qualifier d_Llines 


qualifier f default 
qualifier q floating 
qualifier 1% default 


qualifier Listing value(type=Sout file) batch, Label=output2 
£ 


qualifier machine. code 
ob} 


AME WN 0 DOONAN EWN 0 OONOAUE WIN (OO ONOU SEWN — OODNOAUSWN OO ODNOUS WN 


PUPP & BP BEEBE BS EWAN ANNI NII RPP PININONIP DY 2 


qualifier ect, value(type=Sout file) ,default,label=output1 
qualifier optimize, efault 

qualifier variant, value(list) 

qualifier warnings, DEF AULT 

qualifier work_files, value ; 

qualifier rsxiT, syntax=fortran_using_f77 


$$ $$$ $$ 
H1 , 
vecyunctate 10:8 SOSSSDUATBSECLD.BUGSREIFORYRAN-CLDS1 <1), "29® 2 


qualifier library, placement=Local 

qualifier show, value(List,type=show_options) 
qualifier standard, value(List,type=standard_options) 
qualifier dml, syntax=dml 

outputs (output! ,output2) 


$ SET COMMAND SRC$:FORTRAN.CLD,PASCAL.CLD/TABLES=EXE$:DCLTABLES/OUTPUT=EXE$:DCLTABLES/LISTING=LIS$:DCLTABLE2 


DEFINE VERB pascal 
IMAGE 
cross srutrenee, 


machine_code, 
bject 


NOUSWN OVD ONOULWHS 


aed a ts td dd 


$ SET COMMAND SRCS$:FORTRAN.CLD,PASCAL.CLD/TABLES=EXE$:DCLTABLES/OUTPUT=EXE$:DCLTABLES/LISTING=LIS$:DCLTABLE2 
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LABEL=input1, VALUE(REQUIRED, LIST IMPCAT, TYPE=$INFILE), PROMPT="File’’ 
DEFAULT, ALUE (1 IST), PLACEMENT=POSITIO: 

PLACERENT=B ITIONAL 

DEFAULT, ad LIST), PLACEMENT=POS1TIONAL 

DEFAULT, VALUE (DER AUC ToS ‘), PLACEMENT=POSITIONA 

LABEL=output2, VALUE (TYPE=$065 FILE), BATCH, PLACENENT=POSI TIONAL 
PLACEMENT=POS1 TION 

LABEL=output1 VALUE (TYPE=SOUTFILE) DEFAULT, PLACEMENT=POSITIONAL 
PLACEMENT £POS SITION 

DEFAULT, PLA ERENT. *b0S1T IONA 

Bi hag erecta PLACEMENT=POS1 TIONAL 


SITIONA 
DEFAULT, PLACEMENT= POSITIONAL 
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